home *** CD-ROM | disk | FTP | other *** search
/ The Netter Presenter: Ur…ion in Overactive Bladder / The Netter Presenter: Urinary System - Structure & Function in Overactive Bladder.iso / mac / UrinarySystem.app / Contents / Help.dxr / 00004.ls < prev    next >
Encoding:
Text File  |  2004-12-22  |  381 b   |  18 lines
  1. on mouseDown
  2.   hilite member("Topics").line[the mouseLine]
  3. end
  4.  
  5. on mouseUp me
  6.   TermName = member("Topics").line[the mouseLine]
  7.   if TermName.line.count > 1 then
  8.     abort()
  9.   end if
  10.   if (TermName = EMPTY) or (TermName = VOID) then
  11.     abort()
  12.   end if
  13.   if offset("   ", TermName) > 0 then
  14.     delete TermName.char[1..3]
  15.   end if
  16.   member("Terms").rtf = member(TermName).rtf
  17. end
  18.